home *** CD-ROM | disk | FTP | other *** search
/ Suzy B Software 2 / Suzy B Software CD-ROM 2 (1994).iso / stos / stos_81 / memory.bas (.txt) < prev    next >
Atari STOS Basic  |  1987-04-21  |  15KB  |  99 lines
  1. 10 KEY
  2. 100 VARNAME
  3. 1000 RETURN
  4. 101 VARNAME
  5. 120 VARNAME
  6. 130 VARNAME
  7. 140 FOR
  8. 141 DATA
  9. 2 DEF
  10. 20 PALETTE
  11. 200 REM ----------- game ------------
  12. 2000 CLS
  13. 201 KEY
  14. 2010 FOR
  15. 202 VARNAME
  16. 2020 VARNAME
  17. 2030 NEXT
  18. 2050 IF
  19. 210 FOR
  20. 2100 VARNAME
  21. 211 FOR
  22. 2110 FOR
  23. 212 FOR
  24. 2120 IF
  25. 2130 NEXT
  26. 220 FOR
  27. 2200 FOR
  28. 2210 LOCATE
  29. 2220 NEXT
  30. 2900 WAIT KEY
  31. 2910 RUN
  32. 300 VARNAME
  33. 310 FOR
  34. 315 FOR
  35. 317 REPEAT
  36. 320 VARNAME
  37. 325 UNTIL
  38. 330 INC
  39. 335 SET ZONE
  40. 340 VARNAME
  41. 350 INK
  42. 351 INK
  43. 360 NEXT
  44. 365 REPEAT
  45. 370 FOR
  46. 371 PEN
  47. 375 GOSUB
  48. 376 LOCATE
  49. 380 NEXT
  50. 385 UNTIL
  51. 399 GOTO
  52. 40 SPRITE
  53. 400 INC
  54. 402 BELL
  55. 409 REPEAT
  56. 410 SPRITE
  57. 420 VARNAME
  58. 450 UNTIL
  59. 455 IF
  60. 460 VARNAME
  61. 470 VARNAME
  62. 475 INK
  63. 480 SPRITE
  64. 485 VARNAME
  65. 490 REPEAT
  66. 5 DIM
  67. 50 PEN
  68. 500 REPEAT
  69. 510 SPRITE
  70. 520 VARNAME
  71. 530 UNTIL
  72. 535 IF
  73. 540 VARNAME
  74. 550 VARNAME
  75. 560 INK
  76. 570 SPRITE
  77. 575 VARNAME
  78. 60 PEN
  79. 600 IF
  80. 610 VARNAME
  81. 620 INC
  82. 630 PEN
  83. 640 BOOM
  84. 650 FOR
  85. 660 SPRITE
  86. 680 INC
  87. 690 IF
  88. 699 GOTO
  89. 70 PEN
  90. 700 FOR
  91. 710 SPRITE
  92. 720 INK
  93. 721 RBOX
  94. 730 INK
  95. 731 PAINT
  96. 799 GOTO
  97. 80 LOCATE
  98. 90 IF
  99.